PC Answers 1998 January/PC Answers Issue 49 Cover CD January 1998.iso/Apps/Director/DATA.Z/Tweening.dir/Standard Elements_2_Initialize Standard Movie Handlers.ls

Text File | 1997-05-10 | 736 b | 43 lines

on openWindow
  if the windowType of the activeWindow <> 4 then
    set the windowType of the activeWindow to 4
    set the title of the activeWindow to the movieName
  end if
end

on closeWindow
  if count(the windowList) < 2 then
    clearGlobals()
  end if
  forget(the activeWindow)
end

on activateWindow
  continue()
end

on deactivateWindow
  pause()
end

on initStandardElements
  global gMaxChannels, gTweeningButtonPropertyList
  set gMaxChannels to 48
  if not voidp(gTweeningButtonPropertyList) then
    nothing()
  else
    BuildButtonPropertyList([])
    set gTweeningButtonPropertyList to the result
  end if
end

on stopMovie
  sound stop 1
  sound stop 2
  forget(the activeWindow)
end

on idle
  doRollOverCheck()
end